#include"Mystdio.h"
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
#include <unistd.h>

#define FILE_MODE 0666
//"w","r","a"
_FILE*_fopen(const char*filename,const char*flag)
{
    assert(filename);
    assert(flag);
    int f=0;
    int fd=-1;
    if(strcmp("w",flag)==0)
    {
        f=(O_CREAT|O_WRONLY|O_TRUNC);
        fd=open(filename,f,FILE_MODE);
    }
    else if(strcmp(flag,"a")==0)
    {
        
        f=(O_CREAT|O_WRONLY|O_APPEND);
        fd=open(filename,f,FILE_MODE);
    }
    else if(strcmp(flag,"r")==0)
    {
        f=O_RDONLY;
        fd=open(filename,f);
    }
    else return NULL;
    if(fd==-1) return NULL;

    _FILE* fp=(_FILE*)malloc(sizeof(_FILE));
    if(fp==NULL) return NULL;
    fp->fileno=fd;
    //按理说是要先判断文件类型的
    //fp->flag=FLUSH_LINE;
    fp->flag=FLUSH_ALL;
    fp->out_pos=0;
    return fp;
}

int _fwrite(_FILE*fp,const char*s,int len)
{
    //未作异常处理(内存不够等)
    memcpy(&fp->outbuffer[fp->out_pos],s,len);
    //更新输出缓冲区的下标位置 
    fp->out_pos+=len;
    if(fp->flag&FLUSH_NOW)
    {
        //向缓存区中写入要输入的内容
         write(fp->fileno,fp->outbuffer,fp->out_pos);
         fp->out_pos=0;
    }
    else if(fp->flag&FLUSH_LINE)
    {
        //暂时不考虑其他情况
        if(fp->outbuffer[fp->out_pos-1]=='\n')
        {
            write(fp->fileno,fp->outbuffer,fp->out_pos);
            fp->out_pos=0;
        }
    }
    else if(fp->flag&FLUSH_ALL)
    {
        if(fp->out_pos==SIZE)
        {
            write(fp->fileno,fp->outbuffer,fp->out_pos);
            fp->out_pos=0;
        }
    }
    return len;
}

void _fflush(_FILE*fp)
{
    if(fp->out_pos>0)
    {
        printf("flush\n");
        write(fp->fileno,fp->outbuffer,fp->out_pos);
        fp->out_pos=0;
    }
}

void _fclose(_FILE*fp)
{
    _fflush(fp);//进程退出时强制刷新
    close(fp->fileno);
    free(fp);
}








